
**APPENDIX TABLE 10: Proxies for Ability Among Controls**

use  "$data/admin_data.dta", clear
rename d_uptake_during_after_LL_new_8 d_f

local j =1
foreach var of varlist  default_at_maturity {
	reg `var' female bl_bus_owner d_lleligible age ever_business HHsize ///
		childunder9 land d_bank_deposit COzaat months_CO pos_CO literacy ///
		laxman_bus_knowledge risk_aversion_gen index_optimism_bl fu_dummy* ///
		if (EDT_treat==0 & L_ttreat==0 & d_f ==1 & fu_dummy7==0) , cl(co_code1)
	estimates store `var'
	
	sum  `var' if EDT_treat==0 & L_ttreat==0 & fu_dummy7==0 & d_f ==1 
	estadd scalar mean_y=r(mean)
	local j = `j'+1
}

estout * using "$out/OA-TableA10-Col1.xls", cells("b(star fmt(3))" se(par(`"="("' `")""'))) starlevels(* 0.10 ** 0.05 *** 0.01) stats(mean_y N r2 p, fmt(2 0 2 2) labels("mean dependent variable" "N.obs" "R-Sq" "p")) replace
estimates clear

local j =1
foreach var of varlist change_log {
	reg `var' female bl_bus_owner d_lleligible age ever_business HHsize ///
		childunder9 land d_bank_deposit COzaat months_CO pos_CO literacy ///
		laxman_bus_knowledge risk_aversion_gen index_optimism_bl fu_dummy* ///
		if (EDT_treat==0 & L_ttreat==0  & fu_dummy7==0) , cl(co_code1)
	estimates store `var'
	
	sum  `var' if EDT_treat==0 & L_ttreat==0 & fu_dummy7==0 
	estadd scalar mean_y=r(mean)
	local j = `j'+1
	}

estout *  using "$out/OA-TableA10-Col2.xls", cells("b(star fmt(3))" se(par(`"="("' `")""'))) starlevels(* 0.10 ** 0.05 *** 0.01) stats(mean_y N r2 p, fmt(2 0 2 2) labels("mean dependent variable" "N.obs" "R-Sq" "p")) replace
estimates clear
